(encoded-kbd-self-insert-sjis):

Handle katakana-jisx0201 correctly.

diff --git a/lisp/international/encoded-kb.el b/lisp/international/encoded-kb.el
index 8cc4850e4a1130393157c7ec6f765e8d8a568735..e23d9c4bd758426e862447ba414239377cee0baf 100644 (file)
--- a/lisp/international/encoded-kb.el
+++ b/lisp/international/encoded-kb.el
@@ -222,7 +222,7 @@ The following key sequence may cause multilingual text insertion."
         (if (or (< last-command-char ?\xA0) (>= last-command-char ?\xE0))
             (decode-sjis-char (+ (ash last-command-char 8)
                                  (read-char-exclusive)))
-          (make-char 'latin-jisx0201 last-command-char))))
+          (make-char 'katakana-jisx0201 last-command-char))))
     (self-insert-command 1)))
 
 (defun encoded-kbd-self-insert-big5 ()